home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet multimedia / Animacje, filmy i prezentacje / Modelowanie 3D / K-3D 0.6.5.0 / k3d-all-in-one-setup-0.6.5.0.exe / k3d-setup-0.6.5.0.exe / share / lsystem / trees.ls < prev    next >
Encoding:
Text File  |  2005-02-12  |  307 b   |  21 lines
  1. # --- L-System Parser/Mutator --- Lj Lapre ----------------------------------
  2. 12
  3. 20
  4. 50
  5. #
  6. c(12)&(90)Tg(7500)Tg(7500)T
  7. #
  8. T=[^(90)CCA]
  9. A=CBD>(94)CBD>(132)BD
  10. B=[&CDCD$A]
  11. D=[g(50)Lg(50)Lg(50)Lg(50)Lg(50)Lg(50)L]
  12. #
  13. C=!(.95)~(5)tF
  14. #
  15. F='(1.25)F'(.8)
  16. #
  17. L=[~f(200)c(8){+(30)f(200)-(120)f(200)-(120)f(200)}]
  18. f=z
  19. z=_
  20. @
  21.